A1 = readmatrix ('NiI2_CPGE_Spectra_-24V_30K_500-550.csv')
A2 = readmatrix ('NiI2_CPGE_Spectra_-24V_30K_550-600.csv')
%B = readmatrix('supercontinuum_power_calibration.csv')

x1 = A1(:,1)
y1 = A1(:,3)*1e12*2.45
y2 = A1(:,5)*1e12*2.45
y3 = A1(:,6)*1e12*2.45

x2 = A2(:,1)
m1 = A2(:,3)*1e12
m2 = A2(:,5)*1e12
m3 = A2(:,6)*1e12

hold on
plot(x1,y1,LineWidth=1,Color=[0.8 0 0])
plot(x1,y2,LineWidth=1,Color=[0 0 0.8])
plot(x2,m1,LineWidth=1,Color=[0.8 0 0])
plot(x2,m2,LineWidth=1,Color=[0 0 0.8])
%plot(x,z1,LineWidth=1,Color=[0.8 0 0])
%plot(x,z2,LineWidth=1,Color=[0 0 0.8])
%plot(x,n,LineWidth=1,Color=[0 0 0.8])
%plot(x,r,LineWidth=1,Color=[0 0 0])
xlim([500,600])
xticks(500:50:600)
%ylim([0,0.11])
%yticks([0:0.05:0.1])
set(gca,'XMinorTick','on','YMinorTick','on')
set(gca,'box','on','Xcolor',[0 0 0],'Ycolor',[0 0 0])
hold off
box on
set(gcf,'Position',[0, 0, 200, 200])